home *** CD-ROM | disk | FTP | other *** search
/ Aminet 4 / Aminet 4 - November 1994.iso / aminet / dev / c / restracklib_0_2.lha / ResTrackLib / createport.c < prev    next >
C/C++ Source or Header  |  1994-07-31  |  2KB  |  89 lines
  1. /* createport.c */
  2.  
  3. #include <stdio.h>
  4. #include <exec/ports.h>
  5. #include <clib/exec_protos.h>
  6. #ifdef REGARGS
  7. #   include <pragmas/exec_pragmas.h>
  8. #endif
  9.  
  10. #include "restrack_intern.h"
  11.  
  12.  
  13. /*****************************************************************************
  14.  
  15.     NAME
  16.     __rtl_CreateMsgPort -- allocate memory
  17.  
  18.     SYNOPSIS
  19.     struct MsgPort * __rtl_CreateMsgPort (const char * file, int line);
  20.  
  21.     FUNCTION
  22.     Stub for CreateMsgPort().
  23.  
  24.     HISTORY
  25.     23. Jul 1994    Optimizer   created
  26.  
  27. ******************************************************************************/
  28.  
  29. struct MsgPort * __rtl_CreateMsgPort (const char * file, int line)
  30. {
  31.     struct MsgPort * mp;
  32.  
  33.     if ( (mp = CreateMsgPort ()) )
  34.     CHECK_ADD_RN(RTL_EXEC,RTLRT_MsgPort,mp,0)
  35.  
  36.     return (mp);
  37. } /* __rtl_CreateMsgPort */
  38.  
  39.  
  40. /*****************************************************************************
  41.  
  42.     NAME
  43.     __rtl_DeleteMsgPort
  44.  
  45.     SYNOPSIS
  46.     void __rtl_DeleteMsgPort( struct MemHeader *freeList, APTR memoryBlock,
  47.             ULONG byteSize, const char * file, int line );
  48.  
  49.     FUNCTION
  50.     Stub for FreeMem(). Frees a block of memory allocated by
  51.     __rlt_AllocMem().
  52.  
  53.     HISTORY
  54.     23. Jul 1994    Optimizer   created
  55.  
  56. ******************************************************************************/
  57.  
  58. void __rtl_DeleteMsgPort (struct MsgPort * mp, const char * file, int line)
  59. {
  60.     ResourceNode * node;
  61.  
  62.     if ((node = FindResourceNode1 (mp)) )
  63.     {
  64.     if (node->Resource != RTLRT_MsgPort)
  65.     {
  66.         fprintf (stderr, "ERROR: DeleteMsgPort() at %s:%d called for\n",
  67.             file, line);
  68.         PrintResourceNode (node);
  69.     }
  70.     else
  71.     {
  72.         DeleteMsgPort (mp);
  73.         RemoveResourceNode (node);
  74.     }
  75.     }
  76.     else
  77.     CHECK_RT_ERROR_OR_CALL(RTL_EXEC,DeleteMsgPort,"(%p)",mp, DeleteMsgPort(mp))
  78.  
  79. } /* __rlt_DeleteMsgPort */
  80.  
  81.  
  82. NRT_RET(struct MsgPort *,CreateMsgPort,(void),())
  83. NRT(DeleteMsgPort,(struct MsgPort * mp),(mp))
  84.  
  85.  
  86. /******************************************************************************
  87. *****  ENDE createport.c
  88. ******************************************************************************/
  89.